home *** CD-ROM | disk | FTP | other *** search
/ PC Play 129 / pc play 129.iso / Demo / man2 / man2.exe / scenarios / train / Train 09.scl < prev    next >
Encoding:
Text File  |  2006-10-20  |  27.6 KB  |  701 lines
  1. scenario = GetProperties()
  2. scenario.ScenarioType = 1
  3. scenario.Title = "sc_Train_09_00"
  4. scenario.Map = "Beotorum.dat"
  5. scenario.Description = "sc_Train_09_01"
  6. scenario.Picture = "Train 09.dds"
  7. scenario.iSortOrder = 9
  8.  
  9. scenario.vShowMessageBoxes[STDDT_GUERILLA] = false
  10. scenario.vShowMessageBoxes[STDDT_INITIAL_DISCLOSE] = false
  11. scenario.vShowMessageBoxes[STDDT_ORDINARY_DICLOSE] = false
  12. scenario.vShowMessageBoxes[STDDT_COMBAT_PHASE] = false
  13. scenario.vShowMessageBoxes[STDDT_SHOW_REVENUE] = false
  14. scenario.vShowMessageBoxes[STDDT_AUTOFINISH_GUERILLA] = false
  15. scenario.vShowMessageBoxes[STDDT_AUTOFINISH_COMBAT] = false
  16. scenario.vShowMessageBoxes[STDDT_AUTOFINISH_REVENUE] = false
  17. scenario.vShowMessageBoxes[STDDT_AUTOFINISH_DISCLOSE] = false
  18. scenario.vShowMessageBoxes[STDDT_YOU_CAPTURED_CAPITAL] = false
  19. scenario.vShowMessageBoxes[STDDT_YOU_CLEARED_TERRITORY] = false
  20. scenario.vShowMessageBoxes[STDDT_YOU_CAPTURED_COUNTRY] = false
  21. scenario.vShowMessageBoxes[STDDT_YOU_GOT_INDEMNITY] = false
  22. scenario.vShowMessageBoxes[STDDT_ENEMY_CLEARED_TERRITORY] = false
  23. scenario.vShowMessageBoxes[STDDT_ENEMY_INVADED] = false
  24. scenario.vShowMessageBoxes[STDDT_ENEMY_CAPTURED_COUNTRY] = false
  25. scenario.vShowMessageBoxes[STDDT_ENEMY_DISCLOSE] = false
  26. scenario.vShowMessageBoxes[STDDT_DICLOSE_COUNTRY] = false
  27. scenario.vShowMessageBoxes[STDDT_INVADE_COUNTRY] = false
  28.  
  29. Player(PT_PLAYER, RACE_HUMANS)
  30. Player(PT_AI, RACE_ALIENS)
  31.  
  32. SetInitialCamera(-0.599832, -0.000000, 0.800126, 0.000000, -0.671434, 0.543885, -0.503355, 0.000000,-0.435176, -0.839160, -0.326239, 0.000000,1690.444580, 900.000000, -427.242706, 1.000000)
  33.  
  34. function InitialMOB()
  35.     StartMOB(2)
  36.  
  37.     ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_02")
  38.     ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_03")
  39.     ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_04")
  40.     ShowXBallon(51, -1, MBS_CENTER, 300, 350, "sc_Train_09_05") 
  41.  
  42.         FlyCamera(-0.504705, 0.000000, -0.863292, 0.000000, 0.844555, 0.207213, -0.493751, 0.000000,0.178885, -0.978296, -0.104581, 0.000000,747.690430, 713.391296, -891.475586, 1.000000)
  43.  
  44.  
  45.  
  46.  
  47.                         ShowBallon(51, -1, MBS_CENTER, 16, 26,"sc_Train_09_07")
  48. --            FlyCamera(-0.897869, 0.000000, -0.440264, 0.000000, 0.235631, 0.844723, -0.480543, 0.000000,0.371901, -0.535204, -0.758450, 0.000000,214.324829, 294.297791, -101.542206, 1.000000)
  49.  
  50.  
  51. --            FlyCamera(0.999762, 0.000000, 0.021798, 0.000000, -0.008578, 0.919321, 0.393414, 0.000000,-0.020039, -0.393508, 0.919103, 0.000000,1738.976929, 250.637390, -1992.766602, 1.000000)
  52.  
  53.  
  54.         FlyCamera(0.951247, 0.000000, -0.308430, 0.000000, 0.243187, 0.615075, 0.750028, 0.000000, 0.189708, -0.788468, 0.585089, 0.000000, 770.159241, 900.000000, -2076.143311, 1.000000)
  55.  
  56.             SelectCountry(1)
  57.             SelectCountry(13)
  58.             SelectCountry(8)
  59.             SelectCountry(5)
  60.             SelectCountry(12) 
  61.             ShowBallon(51, -1, MBS_CENTER, 27, 31, "sc_Train_09_08")
  62.         pause(1.0)
  63.  
  64.  
  65. --[[            ShowBallon(51, -1, MBS_LEFT, 27, 45, "sc_Train_09_09")
  66.  
  67.             ShowBallon(51, -1, MBS_CENTER, 27, 27, "sc_Train_09_10")
  68.  
  69.             FlyCamera(0.713980, 0.000000, -0.700166, 0.000000, 0.638820, 0.409336, 0.651424, 0.000000,0.286603, -0.912384, 0.292258, 0.000000,1040.540771, 418.158508, -898.900452, 1.000000)
  70.  
  71.             ShowBallon(51, -1, MBS_RIGHT, 17, 21, "sc_Train_09_11")
  72.  
  73.             FlyCamera(-0.868718, 0.000000, -0.495307, 0.000000, 0.192242, 0.921606, -0.337173, 0.000000,0.456478, -0.388127, -0.800616, 0.000000,118.109573, 319.708801, -829.571777, 1.000000)
  74.  
  75.             ShowBallon(51, -1, MBS_RIGHT, 5, 31, "sc_Train_09_12")
  76.  
  77.             FlyCamera(0.994432, 0.000000, -0.105379, 0.000000, 0.087681, 0.554691, 0.827424, 0.000000,0.058453, -0.832057, 0.551602, 0.000000,526.062195, 301.459259, -1999.719482, 1.000000)
  78.     
  79.             ShowBallon(51, -1, MBS_LEFT, 8, 48, "sc_Train_09_13")
  80. ]]--            
  81.             UnselectCountry(1)
  82.             UnselectCountry(8)
  83.             UnselectCountry(5)
  84.             UnselectCountry(12)
  85.             UnselectCountry(13)
  86.  
  87.  
  88.             FlyCamera(-0.897869, 0.000000, -0.440264, 0.000000, 0.235631, 0.844723, -0.480543, 0.000000,0.371901, -0.535204, -0.758450, 0.000000,214.324829, 294.297791, -101.542206, 1.000000)
  89.             
  90.             ShowBallon(51, -1, MBS_CENTER, 7, 15, "sc_Train_09_14")
  91. --            FlyCamera(0.907236, 0.000000, -0.420622, 0.000000, 0.371852, 0.467390, 0.802043, 0.000000,0.196595, -0.884051, 0.424033, 0.000000,666.358276, 1249.911499, -2037.883789, 1.000000)
  92.  
  93.  
  94.         FlyCamera(0.951247, 0.000000, -0.308430, 0.000000, 0.243187, 0.615075, 0.750028, 0.000000, 0.189708, -0.788468, 0.585089, 0.000000, 770.159241, 900.000000, -2076.143311, 1.000000)
  95.  
  96.             ShowBallon(51, -1, MBS_CENTER, 14, 32, "sc_Train_09_15")
  97.             ShowBallon(51, -1, MBS_CENTER, 14, 32,  "sc_Train_09_16")
  98.     
  99. --            FlyCamera(0.793712, 0.000000, -0.608293, 0.000000, 0.301578, 0.868450, 0.393504, 0.000000,0.528272, -0.495777, 0.689300, 0.000000,230.585983, 727.087402, -2105.634521, 1.000000)
  100.  
  101.             ShowBallon(51, -1, MBS_CENTER, 14, 32, "sc_Train_09_17")
  102.             ShowBallon(51, -1, MBS_CENTER, 14, 32, "sc_Train_09_18")
  103.  
  104.             FlyCamera(0.796311, 0.000000, 0.604888, 0.000000, -0.132997, 0.975529, 0.175085, 0.000000,-0.590086, -0.219870, 0.776824, 0.000000,1552.917358, 188.635468, -1627.253174, 1.000000)
  105.             ShowBallon(51, -1, MBS_CENTER, -28, -58, "sc_Train_09_19")
  106.             ShowBallon(51, -1, MBS_CENTER, -28, -58, "sc_Train_09_19a")
  107.  
  108.                 Money(4, MONEY_TOTAL_REVENUE, 0)
  109.                 Money(4, MONEY_GUERRILLA, 0)
  110.                 Money(3, MONEY_TOTAL_REVENUE, 0)
  111.                 Money(3, MONEY_GUERRILLA, 0)
  112.  
  113.                 FlyCamera(0.571643, 0.000000, -0.820502, 0.000000, 0.392861, 0.877921, 0.273706, 0.000000,0.720336, -0.478805, 0.501858, 0.000000,1259.611450, 302.010620, -1084.309082, 1.000000)
  114.  
  115.                 pause(1.0)  
  116.                 Disclose(4)
  117.                 SetupUnit(100, TANKA, 22, 22)
  118.                 SetupUnit(101, TANKA, 23, 23)
  119.                 SetupUnit(102, TANKA, 24, 24)
  120.                 SetupUnit(103, TANKA, 25, 25)
  121.                 ShowXBallon(51, -1, MBS_CENTER, 470, 420, "sc_Train_09_88")
  122.                 ShowXBallon(51, -1, MBS_CENTER, 470, 420, "sc_Train_09_88a")
  123.             FlyCamera(0.996300, -0.000000, -0.085941, 0.000000, 0.029469, 0.939373, 0.341629, 0.000000, 0.080731, -0.342898, 0.935897, 0.000000, 1483.650024, 176.626480, -1094.538086, 1.000000)
  124.                 ShowXBallon(51, -1, MBS_CENTER, 700, 380, "sc_Train_09_88b")
  125.  
  126.  
  127.  
  128. --[[            ShowBallon(51, -1, MBS_CENTER, -28, -58, "sc_Train_09_21")
  129.             FlyCamera(0.652398, 0.000000, 0.757876, 0.000000, -0.735204, 0.242770, 0.632881, 0.000000,-0.183990, -0.970084, 0.158383, 0.000000,1201.648682, 576.097168, -872.054810, 1.000000)
  130.             SelectCountry(5) 
  131.             ShowBallon(51, -1, MBS_LEFT, 17, 21, "sc_Train_09_22")
  132.             FlyCamera(0.652398, 0.000000, 0.757876, 0.000000, -0.735204, 0.242770, 0.632881, 0.000000,-0.183990, -0.970084, 0.158383, 0.000000,1260.957642, 912.783447, -839.588318, 1.000000)
  133.             ShowObject(ARROW, 1, 16711680, 100, 70, 13, 17, 16, 20)
  134.             ShowObject(ARROW, 2, 16711680, 100, 70, 21, 25, 18, 22)
  135.             ShowObject(ARROW, 3, 16711680, 100, 70, 16, 32, 17, 25)
  136.             ShowObject(ARROW, 4, 16711680, 100, 70, 12, 26, 16, 24)
  137.             ShowBallon(51, -1, MBS_LEFT, 17, 21, "sc_Train_09_23")
  138.             UnselectCountry(5)
  139.             HideObject(1)  
  140.             HideObject(2)  
  141.             HideObject(3)  
  142.             HideObject(4)  
  143.             FlyCamera(0.999832, 0.000000, -0.018337, 0.000000, 0.014131, 0.637284, 0.770499, 0.000000,0.011686, -0.770629, 0.637177, 0.000000,1709.645142, 487.531067, -1927.638672, 1.000000)
  144.             SelectCountry(1)
  145.             ShowXBallon(51, -1, MBS_LEFT, 497, 485, "sc_Train_09_24")
  146.             UnselectCountry(1)
  147.             SelectCountry(2) 
  148.             ShowObject(ARROW, 5, 16711680, 44, 100, 27, 37, 27, 45)
  149.             
  150.             ShowBallon(51, -1, MBS_RIGHT, 25, 35, "sc_Train_09_25")
  151.             UnselectCountry(2)
  152.             HideObject(5)
  153.      
  154.             SelectCountry(13)
  155.             ShowBallon(51, -1, MBS_RIGHT, 4, 10, "sc_Train_09_26")  
  156.             UnselectCountry(13)
  157.             FlyCamera(0.033306, 0.000000, -0.999445, 0.000000, 0.398675, 0.916996, 0.013286, 0.000000,0.916487, -0.398896, 0.030542, 0.000000,-121.377716, 192.583755, -481.674896, 1.000000)
  158. ]]--
  159.  
  160.  
  161.  
  162.  
  163.             FlyCamera(0.429173, 0.000000, -0.903222, 0.000000, 0.782020, 0.500371, 0.371583, 0.000000,0.451946, -0.865811, 0.214746, 0.000000,-95.706718, 845.157104, -1696.780518, 1.000000)
  164.  
  165.             ShowBallon(51, -1, MBS_CENTER, 6, 36, "sc_Train_09_20")
  166.  
  167.             ShowBallon(51, -1, MBS_CENTER, 10, 38, "sc_Train_09_27")
  168.             SelectCountry(8)
  169.             SelectCountry(12)
  170.  
  171.  
  172.  
  173. --            ShowBallon(51, -1, MBS_CENTER, 10, 38,"sc_Train_09_28")
  174.             ShowObject(ARROW, 11, 65280, 100, 70, 2, 38, 4, 44)
  175.             ShowObject(ARROW, 12, 65280, 100, 70, 6, 36, 7, 41) 
  176.             ShowObject(ARROW, 13, 65280, 100, 70, 7, 47, 6, 42)
  177.             UnselectCountry(8)
  178.             UnselectCountry(12) 
  179.             ShowXBallon(51, -1, MBS_CENTER, 300, 300,"sc_Train_09_29")
  180.  
  181. --[[
  182.             FlyCamera(0.999863, 0.000000, 0.016526, 0.000000, -0.015949, 0.261819, 0.964985, 0.000000,-0.004327, -0.965117, 0.261784, 0.000000,612.458801, 552.994812, -1802.229004, 1.000000)
  183.         
  184.             SelectCountry(12)
  185.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_38")
  186.             UnselectCountry(12)
  187.         
  188.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_39")
  189.         
  190.             FlyCamera(0.912586, 0.000000, 0.408886, 0.000000, -0.346649, 0.530331, 0.773681, 0.000000,-0.216845, -0.847791, 0.483973, 0.000000,577.632019, 373.225952, -1842.635620, 1.000000)
  191.             SelectCountry(10)
  192.             SetupUnit( 4098, TANK, 5, 49 )
  193.             SetupUnit( 4099, LBOT, 6, 48 )
  194.             SetupUnit( 4100, LBOT, 7, 47 )
  195.             SetupUnit( 4101, LBOT, 8, 46 )
  196.             SetupUnit( 4102, LBOT, 9, 45 )
  197.             SetupUnit( 4103, MORTAR, 7, 49 )
  198.             SelectUnit( 4098 ) 
  199.             SelectUnit( 4099 ) 
  200.             SelectUnit( 4100 ) 
  201.             SelectUnit( 4101 )  
  202.             SelectUnit( 4102 ) 
  203.             SelectUnit( 4103 ) 
  204.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_40")
  205.             UnselectCountry(10)
  206.             UnselectUnit( 4098 )
  207.             UnselectUnit( 4099 ) 
  208.             UnselectUnit( 4100 )
  209.             UnselectUnit( 4101 )
  210.             UnselectUnit( 4102 )
  211.             UnselectUnit( 4103 ) 
  212.             SetHP( 4098, 0 )
  213.             SetHP( 4099, 0 )
  214.             SetHP( 4100, 0 )
  215.             SetHP( 4101, 0 )
  216.             SetHP( 4102, 0 )
  217.             SetHP( 4103, 0 )
  218.             RemoveDead()
  219.         
  220.             FlyCamera(0.992062, 0.000000, -0.125749, 0.000000, 0.108827, 0.501024, 0.858563, 0.000000,0.063003, -0.865433, 0.497047, 0.000000,656.543945, 373.225952, -1759.138794, 1.000000)
  221.             SelectCountry(11)
  222.             SetupUnit( 4098, LBOT, 9, 45 )
  223.             SetupUnit( 4099, LBOT, 10, 46 )
  224.             SetupUnit( 4100, LBOT, 11, 45 )
  225.             SetupUnit( 4101, LBOT, 12, 46 )
  226.             SetupUnit( 4102, MORTAR, 9, 47 )
  227.             SetupUnit( 4103, MORTAR, 11, 47 )
  228.             SelectUnit( 4098 ) 
  229.             SelectUnit( 4099 ) 
  230.             SelectUnit( 4100 ) 
  231.             SelectUnit( 4101 )  
  232.             SelectUnit( 4102 ) 
  233.             SelectUnit( 4103 ) 
  234.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_41")
  235.             UnselectCountry(10)
  236.             UnselectUnit( 4098 )
  237.             UnselectUnit( 4099 ) 
  238.             UnselectUnit( 4100 )
  239.             UnselectUnit( 4101 )
  240.             UnselectUnit( 4102 )
  241.             UnselectUnit( 4103 ) 
  242.             UnselectCountry(11)
  243.             SetHP( 4098, 0 )
  244.             SetHP( 4099, 0 )
  245.             SetHP( 4100, 0 )
  246.             SetHP( 4101, 0 )
  247.             SetHP( 4102, 0 )
  248.             SetHP( 4103, 0 )
  249.             RemoveDead()
  250.         
  251.             FlyCamera(0.966604, 0.000000, 0.256276, 0.000000, -0.244308, 0.302034, 0.921460, 0.000000,-0.077404, -0.953297, 0.291947, 0.000000,656.543945, 500.048859, -1759.138794, 1.000000)
  252.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_42")
  253.         
  254.             SetupUnit( 4098, LBOT, 5, 49 )
  255.             SetupUnit( 4099, LBOT, 6, 48 )
  256.             SetupUnit( 4100, LBOT, 7, 47 )
  257.             SetupUnit( 4101, LBOT, 8, 46 )
  258.             SetupUnit( 4102, LBOT, 9, 45 )
  259.             SetupUnit( 4103, LBOT, 10, 46 )
  260.             SetupUnit( 4104, LBOT, 11, 45 )
  261.             SetupUnit( 4105, LBOT, 12, 46 )
  262.             SelectUnit( 4098 ) 
  263.             SelectUnit( 4099 ) 
  264.             SelectUnit( 4100 ) 
  265.             SelectUnit( 4101 )  
  266.             SelectUnit( 4102 ) 
  267.             SelectUnit( 4103 ) 
  268.             SelectUnit( 4104 ) 
  269.             SelectUnit( 4105 ) 
  270.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_43")
  271.             UnselectUnit( 4098 )
  272.             UnselectUnit( 4099 ) 
  273.             UnselectUnit( 4100 )
  274.             UnselectUnit( 4101 )
  275.             UnselectUnit( 4102 )
  276.             UnselectUnit( 4103 )
  277.             UnselectUnit( 4104 )
  278.             UnselectUnit( 4105 )
  279.             SetHP( 4098, 0 )
  280.             SetHP( 4099, 0 )
  281.             SetHP( 4100, 0 )
  282.             SetHP( 4101, 0 )
  283.             SetHP( 4102, 0 )
  284.             SetHP( 4103, 0 )
  285.             SetHP( 4104, 0 )
  286.             SetHP( 4105, 0 )
  287.             RemoveDead()
  288.         
  289.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_44")
  290. ]]--
  291.         
  292.             FlyCamera(-0.887829, 0.000000, -0.460173, 0.000000, 0.445711, 0.248730, -0.859927, 0.000000,0.114459, -0.968573, -0.220830, 0.000000,251.212296, 500.048859, -1248.777466, 1.000000)
  293.             SelectCountry(8)
  294.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_45")
  295.             FlyCamera(-0.127555, 0.000000, -0.991831, 0.000000, 0.663324, 0.743454, -0.085307, 0.000000,0.737381, -0.668787, -0.094831, 0.000000,-184.107559, 429.774506, -1190.856445, 1.000000)
  296.             ShowXBallon(51, -1, MBS_LEFT, 386, 261, "sc_Train_09_46")
  297.             UnselectCountry(8)
  298.             FlyCamera(-0.877531, 0.000000, -0.479520, 0.000000, 0.398986, 0.554697, -0.730151, 0.000000,0.265989, -0.832052, -0.486764, 0.000000,183.128799, 429.774506, -1368.909546, 1.000000)
  299.             SelectCountry(12)
  300.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_47")
  301.             UnselectCountry(12)
  302.             FlyCamera(-0.981344, -0.000000, -0.192263, 0.000000, 0.172285, 0.443865, -0.879376, 0.000000,0.085339, -0.896094, -0.435584, 0.000000,272.435577, 464.907349, -947.140991, 1.000000)
  303.  
  304.     FinishMOB()
  305.  
  306.  
  307. end
  308.  
  309. old_prompt = ""
  310.  
  311. function OnUpdate()
  312.  
  313.     if GetCountryControl( 10 ) ~= COLOR_GREEN then
  314.         if GetTurnNumber( COLOR_GREEN ) == 0 then
  315.             if GetCountryControl( 8 ) == COLOR_NONE then
  316.                 ShowPrompting("sc_Train_09_48")
  317.             elseif GetMoney(8, MONEY_DISCLOSURE) > 0 then
  318.                 ShowPrompting("sc_Train_09_49")
  319.             end
  320.         elseif GetTurnNumber( COLOR_GREEN ) == 1 then
  321.             if GetGamePhase() == PHASE_COMBAT then
  322.                 local bDone = true
  323.  
  324.                 for i = 4097, 4120 do
  325.                     if IsAlive( i ) then
  326.                         local p = GetPos( i )
  327.                         if GetMP( i ) > 0 and GetCountry( p.x, p.y ) ~= 10 then
  328.                             bDone = false
  329.                         end
  330.                     end
  331.                 end
  332.  
  333.                 if not bDone then
  334.                     ShowPrompting("sc_Train_09_50")
  335.                 end
  336.             end
  337.         else
  338.             if GetGamePhase() == PHASE_COMBAT then
  339.                 if not AllUnitsMovedAndFiredIfCould() and GetAliveUnitsAmount( COLOR_RED ) > 0 then
  340.                     if GetTurnNumber( COLOR_GREEN ) < 4 then
  341.                         ShowPrompting("sc_Train_09_51")
  342.                     else
  343.                         ShowPrompting("sc_Train_09_52")
  344.                     end
  345.                 end
  346.             elseif GetGamePhase() == PHASE_DISCLOSE then
  347.                 if GetCountryControl( 12 ) == COLOR_NONE then
  348.                     ShowPrompting("sc_Train_09_53")
  349.                 elseif GetMoney(12, MONEY_DISCLOSURE) > 0 then
  350.                     ShowPrompting("sc_Train_09_54")
  351.                 end
  352.             end
  353.         end
  354.     end
  355.  
  356.     if GetGamePhase() == PHASE_DEPLOYMENT then
  357.         if GetMoney(8, MONEY_BANK) > 0 then
  358.             ShowPrompting("sc_Train_09_55")
  359.         elseif GetMoney(12, MONEY_BANK) > 0 then
  360.             ShowPrompting("sc_Train_09_56")
  361.         elseif GetMoney(10, MONEY_BANK) > 0 then
  362.             ShowPrompting("sc_Train_09_57")
  363.         end
  364.     end
  365.  
  366.     if not HasPrompting() then
  367.         ShowPrompting("sc_Train_finish_phase")
  368.     end
  369. end
  370.  
  371. function OnHexClicked(x, y, clicked_unit, selected_unit, command)
  372.     if GetCountryControl( 10 ) == COLOR_GREEN then
  373.         return
  374.     end
  375.  
  376.     if command == CMD_MOVE then
  377.         if GetCountry( x, y ) == 11 then
  378.             IncorrectAction("sc_Train_09_59")
  379.         end
  380.     elseif command == CMD_SETUP then
  381.         if GetGamePhase() == PHASE_DISCLOSE then
  382.             if GetCountry( x, y ) == 12 then
  383.                 if GetType( selected_unit ) ~= HBOT or GetUnitTurnsTo( selected_unit, 6, 46, true, true ) > 1 then
  384.                     IncorrectAction("sc_Train_09_60")
  385.                 end
  386.             elseif ( x == 5 and y == 25 or x == 4 and y == 26 or x == 3 and y == 27 or x == 3 and y == 29 or x == 3 and y == 31 or x == 2 and y == 32 or x == 1 and y == 33 or x == 0 and y == 34 or x == 0 and y == 36 or x == 0 and y == 38 ) then
  387.                     IncorrectAction("sc_Train_09_62")
  388.             elseif GetCountry( x, y ) == 8 then
  389. --[[                if not ( x == 7 and y == 35 or x == 6 and y == 36 or x == 5 and y == 37 or x == 6 and y == 34 or x == 5 and y == 35 or x == 3 and y == 37 or x == 2 and y == 38 or x == 3 and y == 35 or x == 2 and y == 36 or x == 1 and y == 37 ) then
  390.                     IncorrectAction("sc_Train_09_61")
  391.                 else
  392. ]]--
  393.  
  394.                 if GetType( selected_unit ) ~= LBOT and GetType( selected_unit ) ~= TANK then
  395.                     IncorrectAction("sc_Train_09_62")
  396.                 elseif GetAliveUnitsAmount( COLOR_GREEN, TANK ) > 3 then
  397.                     IncorrectAction("sc_Train_09_62")
  398.                 end
  399.             end
  400.         elseif GetGamePhase() == PHASE_DEPLOYMENT then
  401.             if GetType( selected_unit ) ~= LBOT and GetType( selected_unit ) ~= TANK and GetType( selected_unit ) ~= MORTAR then
  402.                 IncorrectAction("sc_Train_09_63")
  403.             elseif GetCountry( x, y ) == 12 then
  404.                 if x + y ~= 54 then
  405.                     IncorrectAction("sc_Train_09_64")
  406.                 end
  407. --[[            elseif GetCountry( x, y ) == 8 then
  408.                 if not ( x == 7 and y == 35 or x == 6 and y == 36 or x == 5 and y == 37 or x == 3 and y == 37 or x == 2 and y == 38 ) then
  409.                     IncorrectAction("sc_Train_09_65")
  410.                 end
  411. ]]--
  412.             end
  413.         end
  414.     end
  415. end
  416.  
  417. function OnCountryDisclosed(country, color)
  418.     if country == 8 then
  419.         StartMOB(3)
  420.         FlyCamera(-0.926483, -0.000000, -0.376335, 0.000000, 0.373785, 0.116215, -0.920205, 0.000000,0.043736, -0.993224, -0.107671, 0.000000,258.146912, 465.739471, -1299.113770, 1.000000)
  421.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_66")
  422.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_67")
  423.         ShowXBallon(51, -1, MBS_RIGHT, 741, 538, "sc_Train_09_68")
  424.         FinishMOB()
  425.     elseif country == 12 then
  426.         if GetMoney(10, MONEY_DISCLOSURE) > 0 then
  427.             IncorrectAction("sc_Train_09_69")
  428.         end
  429.     elseif country == 10 then
  430.         StartMOB(1)
  431.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_70")
  432.         pause(2)
  433.         FlyCamera(-0.913700, -0.000000, -0.406389, 0.000000, 0.335338, 0.564893, -0.753953, 0.000000,0.229566, -0.825164, -0.516143, 0.000000,255.001892, 268.153931, -1400.836304, 1.000000)
  434.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_71")
  435.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_71a")
  436.         FinishMOB()
  437.     elseif color == COLOR_GREEN then
  438.         IncorrectAction("sc_Train_09_72")
  439.     end
  440. end
  441.  
  442. local bVictory = false
  443.  
  444. function OnBeginPhase(phase)
  445.     if phase == PHASE_DISCLOSE then
  446.         if GetTurnNumber( COLOR_GREEN ) == 1 then
  447.             StartMOB(1)
  448.                         FlyCamera(0.852671, 0.000000, 0.522449, 0.000000, -0.407386, 0.626076, 0.664880, 0.000000,-0.327092, -0.779762, 0.533836, 0.000000,720.563171, 347.054565, -1911.019531, 1.000000)
  449.                         ShowXBallon(51, -1, MBS_CENTER, 750, 400, "sc_Train_09_73")
  450.                         FlyCamera(-0.987599, 0.000000, -0.156998, 0.000000, 0.129385, 0.566411, -0.813903, 0.000000,0.088925, -0.824123, -0.559386, 0.000000,325.222870, 557.853699, -947.999634, 1.000000)
  451.                         ShowBallon(51, -1, MBS_CENTER, 5, 39, "sc_Train_09_74")
  452.             FinishMOB()
  453.         elseif GetMoney( 10, MONEY_DISCLOSURE ) == 0 and GetMoney( 12, MONEY_DISCLOSURE ) > 0 then
  454.             StartMOB(1)
  455.             FlyCamera(0.861137, 0.000000, 0.508373, 0.000000, -0.411795, 0.586396, 0.697542, 0.000000,-0.298108, -0.810024, 0.504968, 0.000000,575.600647, 310.757050, -1816.288696, 1.000000)
  456.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_75")
  457.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_76")
  458.             FinishMOB()
  459.  
  460.  
  461.  
  462.         end
  463.     elseif phase == PHASE_COMBAT then
  464.         if GetTurnNumber( COLOR_GREEN ) == 2 then
  465.             StartMOB(1)
  466.                         FlyCamera(-0.938056, 0.000000, -0.346484, 0.000000, 0.336247, 0.241283, -0.910341, 0.000000,0.083601, -0.970455, -0.226337, 0.000000,254.494278, 538.065552, -1295.048828, 1.000000)
  467.                         ShowObject(ARROW, 20, 65280, 100, 70, 6, 36, 7, 41)
  468.                         ShowObject(ARROW, 21, 65280, 100, 70, 2, 38, 4, 42)
  469.                         
  470.                         ShowBallon(51, -1, MBS_CENTER, 4, 32, "sc_Train_09_77")
  471.                         HideObject(20)
  472.                         HideObject(21)
  473.             FinishMOB()
  474.         elseif GetTurnNumber( COLOR_GREEN ) == 3 then
  475.             StartMOB(1)
  476.                         FlyCamera(-0.719280, -0.000000, -0.694721, 0.000000, 0.667948, 0.274933, -0.691561, 0.000000,0.191002, -0.961463, -0.197754, 0.000000,92.870834, 675.793396, -1375.873657, 1.000000)
  477.                         ShowObject(ARROW, 25, 65280, 100, 70, 5, 37, 6, 40)
  478.                         ShowObject(ARROW, 26, 65280, 100, 70, 7, 47, 6, 42)
  479.                         ShowBallon(51, -1, MBS_CENTER, 1, 47, "sc_Train_09_78")
  480.                         HideObject(25)
  481.                         HideObject(26)  
  482.             FinishMOB()
  483.  
  484.         end
  485.     elseif phase == PHASE_DEPLOYMENT then
  486.         if GetTurnNumber( COLOR_GREEN ) == 1 then
  487.             StartMOB(1)
  488.             ShowXBallon(51, -1, MBS_CENTER, 300, 350, "sc_Train_09_79")
  489.             FinishMOB()
  490.         elseif GetCountryControl( 10 ) == COLOR_GREEN then
  491.             StartMOB(1)
  492.             FlyCamera(0.560710, -0.000000, -0.828012, 0.000000, 0.763589, 0.386726, 0.517084, 0.000000,0.320214, -0.922195, 0.216841, 0.000000,288.532623, 352.191803, -1639.366943, 1.000000)
  493.                         
  494.             ShowXBallon(51, -1, MBS_CENTER, 300, 450, "sc_Train_09_80") 
  495.                         
  496.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_81")
  497.                         
  498.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_82")
  499.             FlyCamera(0.050758, 0.000000, -0.998711, 0.000000, 0.940852, 0.335425, 0.047817, 0.000000,0.334992, -0.942067, 0.017026, 0.000000,514.086975, 380.735901, -1452.759521, 1.000000)
  500.                         
  501.                         ShowObject(ARROW, 30, 65280, 100, 50, 8, 42, 11, 41)
  502.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_83")
  503.                         HideObject(30) 
  504.             FinishMOB()
  505.         end
  506.     end
  507. end
  508.  
  509. function OnEndPhase( phase )
  510.     if phase == PHASE_DEPLOYMENT then
  511.         if GetCountryControl( 10 ) == COLOR_GREEN then
  512.             StartMOB(1)
  513.             ShowXBallon(51, -1, MBS_CENTER, 300, 450, "sc_Train_09_84")
  514.             ShowXBallon(51, -1, MBS_CENTER, 300, 450, "sc_Train_09_85")
  515.             bVictory = true
  516.             FinishMOB()
  517.         else
  518.             if GetMoney(8, MONEY_BANK) >= 2 then
  519.                 IncorrectAction("sc_Train_09_86")
  520.             elseif GetMoney(12, MONEY_BANK) >= 2 then
  521.                 IncorrectAction("sc_Train_09_87")
  522.             end
  523.         end
  524.     elseif phase == PHASE_DISCLOSE then
  525.         if GetTurnNumber( COLOR_GREEN ) == 0 then
  526.             if GetCountryControl( 8 ) ~= COLOR_GREEN then
  527.                 IncorrectAction("sc_Train_09_87a")
  528.             end
  529.         elseif GetTurnNumber( COLOR_GREEN ) == 2 then
  530.             if GetCountryControl( 12 ) ~= COLOR_GREEN then
  531.                 IncorrectAction("sc_Train_09_87a")
  532.             end
  533.         end
  534.     elseif phase == PHASE_COMBAT then
  535.         if GetTurnNumber( COLOR_GREEN ) == 1 then
  536.             if IsInvaded ( 10 ) == nil then
  537.                 IncorrectAction("sc_Train_09_87a")
  538.             end
  539.         end
  540.     end
  541. end
  542.  
  543. function OnEndAITurn()
  544.  
  545. if GetTurnNumber( COLOR_GREEN ) == 1 then
  546.         StartMOB(1)
  547.                 FlyCamera(-0.926484, 0.000000, -0.376335, 0.000000, 0.304765, 0.586673, -0.750288, 0.000000, 0.220786, -0.809824, -0.543543, 0.000000, 1290.318604, 377.848877, -700.891968, 1.000000)
  548.  
  549.              ShowXBallon(51, -1, MBS_CENTER, 470, 420, "sc_Train_09_89")
  550.               MoveUnit(100, 24, 20)
  551.                 MoveUnit(101, 25, 21)
  552.                 MoveUnit(102, 26, 22)
  553.                 MoveUnit(103, 27, 23)
  554.                 pause(2.0) 
  555.                 ShowBallon(51, -1, MBS_CENTER, 24, 24, "sc_Train_09_90")
  556.                 ShowBallon(51, -1, MBS_CENTER, 24, 24, "sc_Train_09_91") 
  557.  
  558.                 FlyCamera(0.320802, -0.000000, -0.947146, 0.000000, 0.869700, 0.396042, 0.294571, 0.000000,0.375110, -0.918232, 0.127051, 0.000000,150.483093, 449.671570, -1614.142700, 1.000000)
  559.                 MoveUnit(103, 27, 21)
  560.                 SetHP(100, 0)
  561.                 SetHP(101, 0)
  562.                 SetHP(102, 0)
  563.                 SetHP(103, 0)
  564.                 RemoveDead()
  565.                 ShowBallon(51, -1, MBS_CENTER, 5, 43, "sc_Train_09_92")
  566.                 ShowBallon(51, -1, MBS_CENTER, 5, 43, "sc_Train_09_93")
  567.  
  568.         FinishMOB()
  569.     elseif GetTurnNumber( COLOR_GREEN ) == 2 then
  570.         StartMOB(1)
  571.         FlyCamera(0.967238, 0.000000, 0.253871, 0.000000, -0.203643, 0.597120, 0.775872, 0.000000,-0.151591, -0.802152, 0.577557, 0.000000,438.700348, 304.657043, -1740.929565, 1.000000)
  572.         ShowXBallon(51, -1, MBS_CENTER, 200, 370, "sc_Train_09_94")
  573.         FlyCamera(0.967238, 0.000000, 0.253871, 0.000000, -0.203643, 0.597120, 0.775872, 0.000000,-0.151591, -0.802152, 0.577557, 0.000000,574.715881, 304.657043, -1912.549561, 1.000000)
  574.         ShowXBallon(51, -1, MBS_CENTER, 200, 350, "sc_Train_09_95")
  575.  
  576.         FinishMOB()
  577.     elseif GetTurnNumber( COLOR_GREEN ) == 3 then
  578.         StartMOB(1)
  579.                 FlyCamera(0.717036, 0.000000, -0.697036, 0.000000, 0.520521, 0.665089, 0.535457, 0.000000,0.463591, -0.746764, 0.476893, 0.000000,532.266174, 356.172638, -1661.270386, 1.000000)
  580.                 ShowObject(ARROW, 22, 16711680, 100, 70, 9, 41, 7, 43) 
  581.                 ShowBallon(51, -1, MBS_CENTER, 11, 41, "sc_Train_09_96")
  582.                 
  583.         ShowBallon(51, -1, MBS_CENTER, 11, 41, "sc_Train_09_97")
  584.                 HideObject(22)
  585.         FinishMOB()
  586.     end    
  587. end
  588.  
  589. function OnEndTurn()
  590.      if GetTurnNumber( COLOR_GREEN ) == 1 then
  591.           StartMOB(1)
  592.           ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_98")
  593.           FinishMOB()
  594. end
  595.      if GetTurnNumber( COLOR_GREEN ) == 2 then
  596.           StartMOB(1)
  597.           Country(13, ALLIANCE_DISABLED)
  598.           Country(5, ALLIANCE_DISABLED)
  599.           Country(1, ALLIANCE_DISABLED)
  600.           FinishMOB()
  601.  end
  602.  
  603.  
  604. -- ταπδ≤°Ωα ∩σ≡σΣΓΦµσφΦ 
  605.  
  606.      if GetTurnNumber( COLOR_GREEN ) == 0 then
  607.           StartMOB(1)
  608.           SetMP(100, 0)
  609.           SetMP(101, 0)
  610.           SetMP(102, 0)
  611.           SetMP(103, 0)
  612.           FinishMOB()
  613.  
  614.      end
  615. end
  616.  
  617. function OnCountryCaptured(country, color)
  618.     if country == 10 then
  619.         if color == COLOR_GREEN then
  620.             StartMOB(1)
  621.             FlyCamera(0.609764, 0.000000, 0.792583, 0.000000, -0.660937, 0.551912, 0.508484, 0.000000,-0.437436, -0.833902, 0.336536, 0.000000,499.018799, 310.757050, -1686.566040, 1.000000)
  622.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_99")
  623.             scenario = GetProperties()
  624.             scenario.vShowMessageBoxes[STDDT_THIS_FORGOTTEN_UNIT] = false
  625.             scenario.vShowMessageBoxes[STDDT_THIS_FORGOTTEN_UNIT2] = false
  626.             FinishMOB()
  627.         else
  628.             StartMOB(1)
  629.             FlyCamera(0.609764, 0.000000, 0.792583, 0.000000, -0.660937, 0.551912, 0.508484, 0.000000,-0.437436, -0.833902, 0.336536, 0.000000,499.018799, 310.757050, -1686.566040, 1.000000)
  630.             ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_100")
  631.             FinishMOB()
  632.         end
  633.     end
  634. end
  635.  
  636.  
  637.  
  638. function OnUnitDead(unit)
  639.     if GetAliveUnitsAmount( COLOR_RED ) == 0 and GetCapitalControl( 10 ) ~= COLOR_GREEN then
  640.         StartMOB(1)
  641.         FlyCamera(0.861137, 0.000000, 0.508373, 0.000000, -0.411794, 0.586396, 0.697542, 0.000000,-0.298108, -0.810024, 0.504968, 0.000000,470.429749, 310.757050, -1744.095825, 1.000000)
  642.         ShowXBallon(51, -1, MBS_CENTER, 300, 300, "sc_Train_09_101")
  643.         FinishMOB()
  644.     end
  645. end
  646.  
  647. function CheckForVictory()
  648.     if bVictory then return GAMERESULT_VICTORY end
  649.     if GetCountryControl( 10 ) == COLOR_RED then return GAMERESULT_DEFEAT end
  650.     return GAMERESULT_NONE
  651. end
  652.  
  653. function aiDefence(country)
  654.     aiMustNot()
  655. end
  656.  
  657. function aiDisclosure(country)
  658.     if country == 10 and GetCountryControl( 10 ) == COLOR_NEUTRAL then
  659.         aiMust()
  660.     else
  661.         aiMustNot()
  662.     end
  663. end
  664.  
  665. function aiMustBuyOnDisclose(country)
  666.     aiMustBuy( ARTILLERYA, 6, 46 )
  667.     aiMustBuy( ARTILLERYA, 5, 47 )
  668.     aiMustBuy( BUNKER, 3, 41 )
  669.     aiMustBuy( BUNKER, 2, 42 )
  670.     aiMustBuy( BUNKER, 7, 41 )
  671.     aiMustBuy( BUNKER, 5, 43 )
  672. end
  673.  
  674. function aiMustBuyOnGuerilla(country)
  675.     aiMustBuy( BUNKER, 8, 38 )
  676.     aiMustBuy( BUNKER, 7, 39 )
  677.     aiMustBuy( BUNKER, 6, 40 )
  678.     aiMustBuy( BUNKER, 6, 42 )
  679.     aiMustBuy( BUNKER, 4, 42 )
  680.     aiMustBuy( BUNKER, 3, 43 )
  681. end
  682.  
  683. function InitialSetup()
  684.  
  685. Country(8, ALLIANCE_FNU_SECRET_ALLY)
  686. Country(12, ALLIANCE_FNU_SECRET_ALLY)
  687.  
  688. Country(13, ALLIANCE_FNU_SECRET_ALLY)
  689. Country(5, ALLIANCE_FNU_SECRET_ALLY)
  690. Country(1, ALLIANCE_FNU_SECRET_ALLY)
  691.  
  692. Country(10, ALLIANCE_FL_SECRET_ALLY)
  693. Country(11, ALLIANCE_NEUTRAL)
  694.  
  695. Country(15, ALLIANCE_FL_SECRET_ALLY)
  696. Country(4, ALLIANCE_FL_SECRET_ALLY)
  697. Country(3, ALLIANCE_NEUTRAL)
  698. Country(7, ALLIANCE_NEUTRAL)
  699.  
  700. end
  701.